Labels:text | screenshot | display | software | number | multimedia software | font OCR: GoldED 0 Work:SmallEiffel/lib_std/std_file_read.e C:023 L: 00088/00166 ABC 30⁰ Result = path /= Void; end is connected read character is do if push back" flag then push back" flag := false; else memory = read-byte(input-stream); end; end read character last character: CHARACTER is do Result = memory. to character; end last-character unread character is do push-back-flag := true; end unread character end of input: BOOLEAN is do if not push-back-flag then. Result = memory=eof"code; end; end end-of-input read-line-in(str: STRING) is local mem: INTEGER; do read character; from feature CANY) mem = memory; Sections connect to disconnect end_of_input folose V FALT Anecter golded: registry/presets/eiffel.syntax www. FEEEEEE SEPE H *→ Pre-parse Eiffel 2.0 Comment Manifest string Reserved word Type name Constant name Error or flaw Active make read character read_line_in] same as sfr_open, unread_character labab ab -- Simple Eiffel example. class HELLO creation CANY) make feature (ANY) make is do print("hello% world"); print('N'); end; make Nearly-pi: REAL is 3.1415; USE Import... Cancel
(.png)
